home *** CD-ROM | disk | FTP | other *** search
/ What PC? 1996 June / What PC June 1996.iso / share / dos / c-wizard / install.fil < prev    next >
Encoding:
Text File  |  1995-03-31  |  8.0 KB  |  371 lines
  1. ' THE COLOR WIZARD  DOS / WINDOWS Installation Script
  2. ' Copyright 1994, ImagiSOFT, Inc.
  3. ' Version 1.2
  4. ' April 1, 1995
  5.  
  6. ' Note:  This installation script is written for THE FINISHING TOUCH, a
  7. '        professional installation program which is also an ImagiSOFT
  8. '        product.  It is distributed with THE COLOR WIZARD to make
  9. '        installation easier, and to reduce our support calls.
  10.  
  11. '        This script unpacks 5 compressed files (*.PAK) which is a
  12. '        major feature of the program.  For more information about
  13. '        THE FINISHING TOUCH, call ImagiSOFT at (505) 275-1920, or call
  14. '        our personal BBS number with your modem at (505) 275-9696.
  15. '        It will always have the latest shareware version of
  16. '        THE FINISHING TOUCH so you can "try before you buy".
  17.  
  18. BACKGROUND ~0\WIZARD.BIN
  19. TELESCOPE OFF
  20.  
  21. LANGUAGE ENGLISH      ' supports GERMAN, FRENCH, SPANISH, DANISH, and DUTCH
  22.  
  23. BORDER 1
  24. TELESCOPE ON
  25. SHADOW OFF
  26.  
  27. PAUSE 300              ' display screen for 3 seconds
  28.  
  29. CALL NO_MCGA           ' test for mcga+ monitor
  30.  
  31. MOUSE 0.0              ' mouse is required
  32. JUMP.NO NO_MOUSE
  33.  
  34. FREE 2000              ' if they don't have 2 megs free, forget it
  35. JUMP.NO NO_SPACE
  36.  
  37. ' display opening menu
  38. :OPENING
  39.  
  40. WINOPEN 0 4 31
  41. "        INSTALLATION OPTIONS MENU"
  42. ""
  43. "1.  Install as Microsoft Windows 3.1 Application"
  44. "2.  Install as DOS Application"
  45. "3.  QUIT"
  46. ""
  47. "SELECT ONE OF THE ABOVE:    "
  48.  
  49. WINUPDATE +10 +1 30
  50. "INSTALLATION OPTIONS MENU"
  51. INPUT A 1 +28 +7 15
  52. WINCLOSE
  53.  
  54. CALL TEMP_FILE
  55.  
  56. EXIST ~3\1.TMP
  57. JUMP.YES WINDOWS_APP
  58.  
  59. EXIST ~3\2.TMP
  60. JUMP.YES DOS_APP
  61.  
  62. EXIST ~3\3.TMP
  63. JUMP.YES EXIT
  64.  
  65. BEEP
  66. CALL TMP_DEL
  67. JUMP OPENING
  68.  
  69. ' ------------------------
  70. '   install as a dos app
  71. ' ------------------------
  72. :DOS_APP
  73. CALL TMP_DEL
  74.  
  75. ' have user set the drive
  76. CALL ESC
  77. DRIVE C 0 12 31 15 32 14 79
  78. WINCLOSE
  79.  
  80. ' have user set the path
  81. CALL ESC
  82. PATH \WIZARD 0 12 31 15 32 14 79
  83. WINCLOSE
  84.  
  85. CALL EMPTY_DIR
  86. CALL UNPACK
  87.  
  88. ' create color wizard batch file
  89. PROMPT OFF
  90. DELETE ~1\WIZARD.BAT 0 0 0
  91. PROMPT ON
  92. FILE ~1\WIZARD.BAT
  93. "~1"
  94. "cd ~2"
  95. "WIZARD"
  96. "cd \"
  97.  
  98. WINOPEN 0 4 31
  99. "THE COLOR WIZARD has been successfully installed."
  100. ""
  101. "     To run it, enter the command"
  102. "     from the root directory of drive ~1."
  103. ""
  104. ""
  105. ""
  106. ""
  107. "Press the [Enter] key to continue."
  108. WINUPDATE +36 +3 30
  109. "WIZARD"
  110. WINUPDATE +7 +6 27
  111. "THANK YOU FOR CHOOSING OUR SOFTWARE!"
  112. WAIT +36 +9
  113. WINCLOSE
  114.  
  115. :RUN
  116. WINOPEN 0 10 31
  117. "Would you like to run THE COLOR WIZARD right now   Y or N?"
  118. ASK +60 +1
  119. JUMP.NO EXIT
  120. RUN ~1\WIZARD.BAT
  121.  
  122. ' --------------------------
  123. '   install as windows app
  124. ' --------------------------
  125. :WINDOWS_APP
  126.  
  127. ' these commands set drive and path variables
  128. DRIVE C
  129. PATH \WINDOWS
  130.  
  131. :TEST_WIN
  132. EXIST ~1~2\WIN.COM
  133. JUMP.YES WIN_INSTALL
  134.  
  135. EXIST ~3\1.TMP
  136. JUMP.YES SKIP_BEEP
  137. BEEP
  138. RD ~1~2
  139. WINOPEN 0 4 79
  140. "Microsoft Windows is NOT found in the"
  141. "~1~2 directory.  Please try again."
  142. ""
  143. "Press ENTER to continue."
  144. WAIT +26 +4
  145. WINCLOSE
  146.  
  147. ' windows is in a directory other than C:\WINDOWS
  148. :SKIP_BEEP
  149. CALL TMP_DEL
  150. WINOPEN 0 4 31
  151. "To install THE COLOR WIZARD to Microsoft Windows,"
  152. "we need to know which hard drive Windows is installed on."
  153. ""
  154. "             Most people have Windows on this hard drive."
  155. "             Press ENTER if this is correct, or change to"
  156. "             the correct drive letter."
  157. "             (Press ESC to quit.)"
  158. PROMPT OFF
  159. DRIVE C +2 +3 17 14 32 14 79
  160. WINCLOSE
  161.  
  162. PROMPT ON
  163. WINOPEN 0 4 31
  164. "We also need to know the name of the directory where Microsoft"
  165. "Windows is installed.  Most people have Windows installed in"
  166. "                              this directory.  Press ENTER"
  167. "                              if this is OK, or input the name"
  168. "                              of the directory where Windows"
  169. "                              is installed."
  170. "                              (Press ESC to quit.)"
  171. PROMPT OFF
  172. PATH \WINDOWS +1 +3 17 14 32 14 79
  173. WINCLOSE
  174. PROMPT ON
  175. PROMPT OFF
  176. JUMP TEST_WIN
  177.  
  178. ' you know the windows directory, now install it
  179. :WIN_INSTALL
  180. CALL TMP_DEL
  181.  
  182. PROMPT OFF
  183. COPY ~1~2\PROGMAN.INI ~1~2\PROGMAN.BAK 0 0 0
  184. PROMPT ON
  185. FILE ~1~2\PROGMAN.INI
  186. "Group510=~1\WIZARD\WIZARD.GRP"
  187.  
  188. PATH \WIZARD
  189. MD ~1~2
  190.  
  191. CALL EMPTY_DIR
  192.  
  193. CALL UNPACK
  194.  
  195.  
  196. ' --------------------------------
  197. '  successful install to windows
  198. ' --------------------------------
  199. WINOPEN 0 4 31
  200. "THE COLOR WIZARD has been installed in your Windows environment"
  201. "in the ~1~2 directory.  However, these changes won't"
  202. "take effect until you exit Windows, then run Windows again."
  203. ""
  204. ""
  205. ""
  206. "Press ENTER to return to Windows."
  207. WINUPDATE +12 +5 27
  208. "THANK YOU FOR CHOOSING OUR SOFTWARE!"
  209. WAIT +35 +7
  210. WINCLOSE
  211. END
  212.  
  213. ' ------------------
  214. '   error messages
  215. ' ------------------
  216. :INSTALL_FAILURE
  217. BEEP
  218. WINOPEN 0 4 79
  219. "THE COLOR WIZARD INSTALLATION FAILED BEFORE IT FINISHED!!"
  220. ""
  221. "Possible reasons:"
  222. "   -- The floppy disk was damaged during shipping."
  223. "   -- Your disk drive is out of alignment."
  224. ""
  225. "You may want to delete the files in the ~1~2 directory."
  226. ""
  227. "      Press [Enter] to Quit."
  228. WAIT +30 +9
  229. WINCLOSE
  230. JUMP EXIT
  231.  
  232. ' -----------
  233. ' subroutines
  234. ' -----------
  235. :EMPTY_DIR
  236. EXIST ~1~2\*.*                 ' brand new directory
  237. JUMP.NO SKIP_DEL
  238.  
  239. EXIST ~1~2\WIZARD.EXE          ' existing color wizard software
  240. JUMP.YES SKIP_DEL
  241.  
  242. WINOPEN 0 4 79
  243. "The directory ~1~2 already exists and contains files!"
  244. ""
  245. "   You will have to DELETE ALL THE FILES in this"
  246. "   directory prior to installing in here."
  247. ""
  248. "Press ENTER to Continue."
  249. WAIT +25 +6
  250. WINCLOSE
  251. JUMP OPENING
  252.  
  253. :SKIP_DEL
  254. RETURN
  255.  
  256. ' unpack data files
  257. :UNPACK
  258.  
  259. PROMPT OFF
  260. COPY ~3\CONFIG.SYS ~3\CONFIG.BAK 0 0 0
  261. PROMPT ON
  262. SET.FILES 16
  263.  
  264. COPY ~0\READ.ME ~1\~2\READ.ME 0 12 31
  265.  
  266. WINOPEN 0 20 47
  267. " Press the ARTIST icon for a lesson from our professional artists. "
  268.  
  269. UNPACK WIZARD.PAK 0 12 31 32 15 79          ' main program
  270. JUMP.FAIL INSTALL_FAILURE
  271.  
  272. WINUPDATE +2 +1 47
  273. " Now installing the DINOSAUR coloring book . . .                   "
  274. UNPACK DINO.PAK 0 12 31 32 15 79
  275. JUMP.FAIL INSTALL_FAILURE
  276.  
  277. WINUPDATE +2 +1 47
  278. " Now installing the SHARKS coloring book . . .  "
  279. UNPACK SHARKS.PAK 0 12 31 32 15 79
  280. JUMP.FAIL INSTALL_FAILURE
  281.  
  282. WINUPDATE +2 +1 47
  283. " Press the BOOK icon to read the story of Rapunzel . . ."
  284. UNPACK RAPUN.PAK 0 12 31 32 15 79
  285. JUMP.FAIL INSTALL_FAILURE
  286.  
  287. WINCLOSE
  288.  
  289. :INSERT_DISK                  ' prompt for 2nd disk (if necessary)
  290. EXIST ~0\AESOP.PAK
  291. JUMP.YES SKIP_DISK
  292.  
  293. BEEP
  294. WINOPEN 0 11 79
  295. ""
  296. "  Please Insert Disk #2 in Drive ~0  "
  297. ""
  298. "  Press ENTER when ready . . ."
  299. ""
  300. WAIT +32 +4
  301. WINCLOSE
  302. EXIST ~0\AESOP.PAK
  303. JUMP.NO INSERT_DISK
  304.  
  305. :SKIP_DISK
  306.  
  307. WINOPEN 0 20 47
  308. " Installing the 2,000 year old classic AESOP'S Fables . . .        "
  309. UNPACK AESOP.PAK 0 12 31 32 15 79
  310. JUMP.FAIL INSTALL_FAILURE
  311.  
  312. WINCLOSE
  313.  
  314. RETURN
  315.  
  316. ' create a temporary file in the default directory with a unique name based on the number input by the user
  317. :TEMP_FILE
  318. FILE ~3\~A.TMP
  319. "Delete this temporary file."
  320. RETURN
  321.  
  322. ' delete temporary file created by opening menu
  323. :TMP_DEL
  324. PROMPT OFF
  325. DELETE ~3\~A.TMP 0 0 0
  326. PROMPT ON
  327. RETURN
  328.  
  329. :ESC
  330. WINOPEN 0 20 31
  331. "(Press ESC to Quit) "
  332. RETURN
  333.  
  334. :NO_MCGA
  335. VIDEO MCGA             ' vga monitor is required
  336. JUMP.YES SKIP_VGA
  337. WINOPEN 0 4 79
  338. "This software requires a VGA monitor to run."
  339. "It probably won't run on your computer.  Do"
  340. "you want to install it anyway        Y or N?"
  341. ASK +39 +3
  342. JUMP.YES SKIP_VGA
  343. JUMP EXIT
  344. :SKIP_VGA
  345. RETURN
  346.  
  347. :NO_MOUSE
  348. WINOPEN 0 4 79
  349. "Sorry, but this software requires a mouse to run, and"
  350. "therefore, it won't currently run on your computer. If"
  351. "you have a mouse, make sure that your mouse driver is"
  352. "loaded in AUTOEXEC.BAT or CONFIG.SYS as explained in"
  353. "the documentation which came with your mouse."
  354. ""
  355. "Press ENTER to continue."
  356. WAIT +26 +7
  357. JUMP EXIT
  358.  
  359. :NO_SPACE
  360. WINOPEN 0 4 79
  361. "This software requires at least 2 megabytes of free"
  362. "hard disk space before you can can install it."
  363. ""
  364. "Press ENTER to continue."
  365. WAIT +26 +4
  366. JUMP EXIT
  367.  
  368. :EXIT
  369. CALL TMP_DEL
  370. END
  371.